home *** CD-ROM | disk | FTP | other *** search
/ Cine Live 60 / Cine Live 60.iso / pc / Data / Interface / allocine.k next >
Encoding:
Text File  |  2002-04-18  |  6.7 KB  |  229 lines
  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$00000254,$000000B0,$0000023F,$000002CD,$00000000,$00000000,$00000000,$00000000};
  6.         LayoutWindow is {$0000011D,$000000AD,$00000384,$000002EE,$0000002A,$00000043,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     
  14.     Elements is [
  15.         oMusic2,
  16.         oPUBALLO3,
  17.         oBouton_sommaire4,
  18.         ovid_o5,
  19.         oInternet6,
  20.         oInternet7,
  21.         oALLOCINE8
  22.     ];
  23.     Events is [
  24.         cOnscreenEvent
  25.         with 
  26.             Commands is [
  27.                 cRunCommand
  28.                 with Target is oMusic2; Rewind is true; end
  29.             ];
  30.         end,
  31.         cKeyboardEvent
  32.         with Test is IsSpace; 
  33.             Commands is [
  34.                 cRunCommand
  35.                 with Flags is $00000004; Target is oALLOCINE8; Mode is Toggle; end
  36.             ];
  37.         end,
  38.         cKeyboardEvent
  39.         with Value is "+"; 
  40.             Commands is [
  41.                 cSetVolumeCommand
  42.                 with Mode is ExecuteHigher; end
  43.             ];
  44.         end,
  45.         cKeyboardEvent
  46.         with Value is "-"; 
  47.             Commands is [
  48.                 cSetVolumeCommand
  49.                 with Flags is $00000004; Mode is ExecuteLower; end
  50.             ];
  51.         end,
  52.         cKeyboardEvent
  53.         with Value is "m"; 
  54.             Commands is [
  55.                 cRunCommand
  56.                 with Flags is $00000004; Target is oMusic2; Mode is Toggle; Rewind is true; end
  57.             ];
  58.         end
  59.     ];
  60. end;
  61.  
  62. object oMusic2 is cSound
  63. with 
  64.     Name is "Music"; 
  65.     
  66.     AdjustX is AlignToCenter; AdjustY is AlignToMiddle; 
  67.     AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight; 
  68.     Looping is true; 
  69.     URL is "data/Sons/4.mp3"; URLOption is GetDiskURL; 
  70.     
  71. end;
  72.  
  73. object oPUBALLO3 is cImage
  74. with 
  75.     Flags is $00000400; 
  76.     Name is "PUBALLO"; 
  77.     Enabled is false; 
  78.     AdjustX is AlignToCenter; AdjustY is AlignToMiddle; 
  79.     AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight; 
  80.     
  81.     URL is "data/Images/PUBALLO.JPG"; URLOption is GetDiskURL; 
  82.     
  83.     
  84. end;
  85.  
  86. object oBouton_sommaire4 is cImage
  87. with 
  88.     Flags is $00000400; 
  89.     Name is "Bouton sommaire"; 
  90.     Shown is false; Cursor is oFingerCursor; 
  91.     X is 629; Y is 573; 
  92.     AdjustWidth is GetDataWidth; AdjustHeight is GetDataHeight; 
  93.     
  94.     URL is "data/Images/vid%20sommaire.jpg"; URLOption is GetDiskURL; 
  95.     
  96.     
  97.     Events is [
  98.         cMouseEnterEvent
  99.         with 
  100.             Commands is [
  101.                 cShowCommand
  102.                 with Target is oTargetSelf; end
  103.             ];
  104.         end,
  105.         cMouseLeaveEvent
  106.         with 
  107.             Commands is [
  108.                 cShowCommand
  109.                 with Target is oTargetSelf; Mode is Clear; end
  110.             ];
  111.         end,
  112.         cMouseUpEvent
  113.         with 
  114.             Commands is [
  115.                 cBackCommand
  116.                 with end
  117.             ];
  118.         end
  119.     ];
  120. end;
  121.  
  122. object ovid_o5 is cBox
  123. with 
  124.     Flags is $00008001; 
  125.     release Editor:
  126.         IOWindow is {$000000AF,$0000003E,$0000028F,$000001EF,$00000000,$00000000,$00000000,$00000000};
  127.     end;
  128.     Name is "vid\$E9o"; 
  129.     Shown is false; Cursor is oFingerCursor; 
  130.     X is 313; Y is 271; 
  131.     Width is 164; Height is 145; 
  132.     
  133.     
  134.     Events is [
  135.         cMouseUpEvent
  136.         with Flags is $00004000; Flag is true; 
  137.             Commands is [
  138.                 cEnableCommand
  139.                 with Flags is $00004000; Target is oALLOCINE8; end,
  140.                 cShowCommand
  141.                 with Flags is $00004000; Target is oALLOCINE8; end,
  142.                 cRunCommand
  143.                 with Flags is $00004000; Target is oALLOCINE8; Rewind is true; end,
  144.                 cRunCommand
  145.                 with Flags is $00004000; Target is oMusic2; Mode is Clear; Rewind is true; end
  146.             ];
  147.         end
  148.     ];
  149. end;
  150.  
  151. object oInternet6 is cBox
  152. with 
  153.     Flags is $00000154; 
  154.     Name is "Internet"; 
  155.     Region is {$FFFF028C,$00030005,$00670192,$00030034,$003B7FFF,$0004002F,$0034003B,$00467FFF,$0005002B,$002F0046,$004C7FFF,$00060026,$002B004C,$004E7FFF,$00070021,$0026004E,$004F7FFF,$0008001E,$0021004F,$00517FFF,$0009001D,$001E0051,$00537FFF,$000A001C,$001D0053,$00557FFF,$000B001B,$001C0055,$00577FFF,$000C001A,$001B0057,$00587FFF,$000D0019,$001A0058,$005A7FFF,$000E0018,$0019005A,$005C7FFF,$000F0017,$0018005C,$005D7FFF,$00100016,$00177FFF,$00110015,$0016005D,$005E7FFF,$0012005E,$005F7FFF,$00130014,$00157FFF,$00140013,$0014005F,$00607FFF,$00150012,$00137FFF,$00160011,$00120060,$00617FFF,$00170010,$00110061,$00627FFF,$0018000F,$00107FFF,$0019000E,$000F0062,$00637FFF,$001A000D,$000E0063,$00647FFF,$001B000C,$000D7FFF,$001C000B,$000C0064,$01927FFF,$001E000A,$000B7FFF,$00210009,$000A7FFF,$00240008,$00097FFF,$00270007,$00087FFF,$002A0006,$00077FFF,$002D0005,$00067FFF,$003A0005,$00067FFF,$00470006,$00077FFF,$00480007,$00087FFF,$004A0008,$00097FFF,$004B0009,$000A7FFF,$004D000A,$000B7FFF,$004E000B,$000C7FFF,$0050000C,$000D7FFF,$0051000D,$000E7FFF,$0053000E,$000F7FFF,$0054000F,$001000FA,$01927FFF,$00550060,$00FA7FFF,$00560010,$0011005F,$00607FFF,$00570011,$0012005E,$005F7FFF,$0058005D,$005E7FFF,$00590012,$0013005C,$005D7FFF,$005A0013,$0014005B,$005C7FFF,$005B0014,$0016005A,$005B7FFF,$005C0016,$00180059,$005A7FFF,$005D0018,$00190057,$00597FFF,$005E0019,$001B0056,$00577FFF,$005F001B,$001C0055,$00567FFF,$0060001C,$001E0054,$00557FFF,$0061001E,$001F0053,$00547FFF,$0062001F,$00210052,$00537FFF,$00630021,$00230051,$00527FFF,$00640023,$0024004E,$00517FFF,$00650024,$002D004A,$004E7FFF,$0066002D,$003C0046,$004A7FFF,$0067003C,$00467FFF,$7FFF0000};
  156.     Shown is false; Cursor is oEarthCursor; 
  157.     X is 202; Y is 139; 
  158.     Width is 410; Height is 104; 
  159.     
  160.     
  161.     Events is [
  162.         cMouseUpEvent
  163.         with Flags is $00000004; Flag is true; 
  164.             Commands is [
  165.                 cLaunchCommand
  166.                 with Flags is $00000004; URL is "http://www.allocine.fr"; URLOption is GetSiteURL; Mode is ExecuteBrowser; end
  167.             ];
  168.         end
  169.     ];
  170. end;
  171.  
  172. object oInternet7 is cBox
  173. with 
  174.     Name is "Internet"; 
  175.     Region is {$FFFF0034,$00000000,$00200093,$00000000,$00210038,$005C0072,$00937FFF,$001E0038,$005C7FFF,$001F0072,$00937FFF,$00200000,$00217FFF,$7FFF0000};
  176.     Shown is false; Cursor is oEarthCursor; 
  177.     X is 522; Y is 459; 
  178.     Width is 147; Height is 32; 
  179.     
  180.     
  181.     Events is [
  182.         cMouseUpEvent
  183.         with Flag is true; 
  184.             Commands is [
  185.                 cLaunchCommand
  186.                 with URL is "http://www.allocine.fr"; URLOption is GetSiteURL; Mode is ExecuteBrowser; end
  187.             ];
  188.         end
  189.     ];
  190. end;
  191.  
  192. object oALLOCINE8 is cMPEGMovie
  193. with 
  194.     Flags is $00000150; 
  195.     Name is "ALLOCINE"; 
  196.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  197.     
  198.     Width is 800; Height is 600; 
  199.     
  200.     URL is "data/Videos/ALLOCINE.MPG"; URLOption is GetDiskURL; 
  201.     Events is [
  202.         cMouseUpEvent
  203.         with Flags is $00000004; Flag is true; 
  204.             Commands is [
  205.                 cEnableCommand
  206.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  207.                 cShowCommand
  208.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  209.                 cRunCommand
  210.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  211.                 cRunCommand
  212.                 with Flags is $00000004; Target is oMusic2; Rewind is true; end
  213.             ];
  214.         end,
  215.         cFinishedEvent
  216.         with Flags is $00000004; 
  217.             Commands is [
  218.                 cEnableCommand
  219.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  220.                 cShowCommand
  221.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  222.                 cRunCommand
  223.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  224.                 cRunCommand
  225.                 with Flags is $00000004; Target is oMusic2; Rewind is true; end
  226.             ];
  227.         end
  228.     ];
  229. end;